home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 November
/
CMCD1104.ISO
/
Software
/
Shareware
/
Utilitare
/
picozip
/
PicoZipSetup.exe
/
{app}
/
PicoZip.exe
/
0
/
RCDATA
/
TFMBATCH
/
TFMBATCH.txt
Wrap
Text File
|
2004-09-09
|
31KB
|
1,252 lines
object fmBatch: TfmBatch
Left = 322
Top = 253
Width = 546
Height = 389
BorderIcons = [biSystemMenu]
Caption = 'Batch Tool'
Color = clBtnFace
Constraints.MinHeight = 389
Constraints.MinWidth = 546
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object paBottom: TPanel
Left = 0
Top = 317
Width = 538
Height = 43
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
DesignSize = (
538
43)
object bvBottom: TBevel
Left = 0
Top = 0
Width = 538
Height = 3
Align = alTop
Shape = bsTopLine
end
object buNext: TButton
Left = 295
Top = 10
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = '&Next >'
Default = True
TabOrder = 0
OnClick = buNextClick
end
object buCancel: TButton
Left = 375
Top = 10
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = '&Cancel'
TabOrder = 1
OnClick = buCancelClick
end
object buHelp: TButton
Left = 455
Top = 10
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = '&Help'
TabOrder = 2
OnClick = buHelpClick
end
end
object nbMain: TNotebook
Left = 0
Top = 0
Width = 538
Height = 317
Align = alClient
TabOrder = 0
object TPage
Left = 0
Top = 0
Caption = 'SelectFiles'
DesignSize = (
538
317)
object laSelectedFiles: TLabel
Left = 8
Top = 40
Width = 521
Height = 41
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Caption =
'Please select files to process by clicking on the "Add" button. ' +
'You can remove any item from the list by selecting them, then cl' +
'ick the "Remove" button. After adding all the files you want to ' +
'process, click the "Next" button to proceed.'
WordWrap = True
end
object laTitle0: TLabel
Left = 8
Top = 8
Width = 114
Height = 13
Caption = 'Select Archive Files'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle0: TBevel
Left = 8
Top = 27
Width = 526
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object lbSelectedFiles: TListBox
Left = 8
Top = 88
Width = 437
Height = 222
Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 13
MultiSelect = True
PopupMenu = pmSelect
TabOrder = 0
end
object buAddFile: TButton
Left = 452
Top = 88
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = '&Add'
TabOrder = 1
OnClick = buAddFileClick
end
object buRemoveFile: TButton
Left = 452
Top = 120
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = '&Remove'
TabOrder = 2
OnClick = buRemoveFileClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'Progress'
DesignSize = (
538
317)
object laProgressFilename: TLabel
Left = 8
Top = 40
Width = 99
Height = 13
Caption = 'Currently Processing:'
end
object laCurrentFile: TLabel
Left = 8
Top = 56
Width = 521
Height = 13
Anchors = [akLeft, akTop, akRight]
AutoSize = False
end
object laProgressTotal: TLabel
Left = 8
Top = 120
Width = 53
Height = 13
Caption = 'Total Time:'
end
object laProgressCurrent: TLabel
Left = 8
Top = 80
Width = 56
Height = 13
Caption = 'Current File:'
end
object laFilesProcessed: TLabel
Left = 8
Top = 168
Width = 77
Height = 13
Caption = 'Files Processed:'
end
object laTotalPercent: TLabel
Left = 472
Top = 120
Width = 56
Height = 13
Alignment = taRightJustify
Anchors = [akTop, akRight]
AutoSize = False
Caption = '0%'
end
object laCurrentPercent: TLabel
Left = 472
Top = 80
Width = 57
Height = 13
Alignment = taRightJustify
Anchors = [akTop, akRight]
AutoSize = False
Caption = '0%'
end
object laTitle1: TLabel
Left = 8
Top = 8
Width = 50
Height = 13
Caption = 'Progress'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle1: TBevel
Left = 8
Top = 27
Width = 524
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object pbCurrent: TProgressBar
Left = 8
Top = 96
Width = 521
Height = 17
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
end
object pbTotal: TProgressBar
Left = 8
Top = 136
Width = 521
Height = 17
Anchors = [akLeft, akTop, akRight]
TabOrder = 1
end
object lbProgressCompleted: TListBox
Left = 8
Top = 184
Width = 521
Height = 119
Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 13
TabOrder = 2
end
end
object TPage
Left = 0
Top = 0
Caption = 'Result'
DesignSize = (
538
317)
object laResults: TLabel
Left = 8
Top = 40
Width = 66
Height = 13
Caption = 'Batch Results'
end
object laTitle2: TLabel
Left = 8
Top = 8
Width = 80
Height = 13
Caption = 'Batch Results'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle2: TBevel
Left = 8
Top = 27
Width = 521
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object buCopyResults: TButton
Left = 432
Top = 56
Width = 99
Height = 25
Anchors = [akTop, akRight]
Caption = 'Copy to Clipboard'
TabOrder = 1
OnClick = buCopyResultsClick
end
object buSaveResults: TButton
Left = 432
Top = 88
Width = 99
Height = 25
Anchors = [akTop, akRight]
Caption = 'Save to File'
TabOrder = 2
OnClick = buSaveResultsClick
end
object meResults: TMemo
Left = 8
Top = 56
Width = 417
Height = 251
Anchors = [akLeft, akTop, akRight, akBottom]
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
end
object TPage
Left = 0
Top = 0
Caption = 'SelectOutputDir'
DesignSize = (
538
317)
object laOutputFolder: TLabel
Left = 8
Top = 40
Width = 521
Height = 13
AutoSize = False
Caption = 'Please select the output folder:'
end
object laTitle4: TLabel
Left = 8
Top = 8
Width = 118
Height = 13
Caption = 'Select Output Folder'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle4: TBevel
Left = 8
Top = 27
Width = 524
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object rbOutputSame: TRadioButton
Left = 16
Top = 64
Width = 321
Height = 17
Caption = 'Use the same folder as the original file'
Checked = True
TabOrder = 0
TabStop = True
OnClick = rbOutputFolderClick
end
object rbOutputFolder: TRadioButton
Left = 16
Top = 90
Width = 57
Height = 17
Caption = 'Folder:'
TabOrder = 1
OnClick = rbOutputFolderClick
end
object rxdeOutputFolder: TJvDirectoryEdit
Left = 72
Top = 86
Width = 377
Height = 21
DialogKind = dkWin32
DialogText = 'Select Output Folder'
DialogOptions = [sdAllowCreate, sdPerformCreate]
ButtonFlat = False
Enabled = False
NumGlyphs = 1
TabOrder = 2
end
object ckExtractToSubfolder: TCheckBox
Left = 17
Top = 128
Width = 360
Height = 17
Caption =
'Extract each archive to a separate subfolder in the output folde' +
'r above'
TabOrder = 3
Visible = False
end
object ckRestoreFolders: TCheckBox
Left = 17
Top = 146
Width = 136
Height = 17
Caption = 'Restore original folders'
TabOrder = 4
Visible = False
end
object ckConfirmOverwrites: TCheckBox
Left = 17
Top = 164
Width = 128
Height = 17
Caption = 'Confirm file overwrites'
TabOrder = 5
Visible = False
end
end
object TPage
Left = 0
Top = 0
Caption = 'SelectArcFmt'
DesignSize = (
538
317)
object laOutputFmt: TLabel
Left = 8
Top = 40
Width = 247
Height = 13
Caption = 'Please select the format for the archive files created:'
end
object laTitle5: TLabel
Left = 8
Top = 8
Width = 107
Height = 13
Caption = 'Batch Add Options'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle5: TBevel
Left = 8
Top = 27
Width = 524
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object rbBh: TRadioButton
Left = 16
Top = 64
Width = 200
Height = 17
Caption = '.bh (BlakHole)'
TabOrder = 0
end
object rbCab: TRadioButton
Tag = 1
Left = 16
Top = 80
Width = 200
Height = 17
Caption = '.cab (Microsoft Cabinet)'
TabOrder = 1
end
object rbGz: TRadioButton
Tag = 5
Left = 16
Top = 176
Width = 200
Height = 17
Caption = '.gz (Unix GZip)'
TabOrder = 2
end
object rbJar: TRadioButton
Tag = 6
Left = 16
Top = 96
Width = 200
Height = 17
Caption = '.jar (Javasoft Archive)'
TabOrder = 3
end
object rbLha: TRadioButton
Tag = 2
Left = 16
Top = 112
Width = 200
Height = 17
Caption = '.lha (LHA Archive)'
TabOrder = 4
end
object rbLzh: TRadioButton
Tag = 2
Left = 16
Top = 128
Width = 200
Height = 17
Caption = '.lzh (LZH Archive)'
TabOrder = 5
end
object rbTar: TRadioButton
Tag = 4
Left = 16
Top = 144
Width = 200
Height = 17
Caption = '.tar (Unix Tape Archive)'
TabOrder = 6
end
object rbZip: TRadioButton
Tag = 3
Left = 16
Top = 160
Width = 200
Height = 17
Caption = '.zip (Zip Archive)'
Checked = True
TabOrder = 7
TabStop = True
end
object ckDeleteSource: TCheckBox
Left = 8
Top = 200
Width = 209
Height = 17
Caption = 'Delete original file after creating archive'
TabOrder = 8
end
object ckAutoOverwrite: TCheckBox
Left = 8
Top = 216
Width = 185
Height = 17
Caption = 'Overwrite files without prompting'
TabOrder = 9
end
end
object TPage
Left = 0
Top = 0
Caption = 'AddOptions'
DesignSize = (
538
317)
object laFilesToAdd: TLabel
Left = 8
Top = 40
Width = 258
Height = 13
Caption = 'Select files to add to your previously selected archives:'
end
object laTitle6: TLabel
Left = 8
Top = 8
Width = 108
Height = 13
Caption = 'Select Files to Add'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle6: TBevel
Left = 8
Top = 27
Width = 523
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object lbAddFiles: TListBox
Left = 8
Top = 56
Width = 441
Height = 183
Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 13
MultiSelect = True
PopupMenu = pmSelect
TabOrder = 0
end
object buAddMore: TButton
Left = 456
Top = 56
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = '&Add'
TabOrder = 1
OnClick = buAddMoreClick
end
object buRemoveMore: TButton
Left = 456
Top = 88
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = '&Remove'
TabOrder = 2
OnClick = buRemoveMoreClick
end
object gbAddOptions: TGroupBox
Left = 8
Top = 243
Width = 441
Height = 65
Anchors = [akLeft, akRight, akBottom]
Caption = 'Add Options'
TabOrder = 3
object laAddCompression: TLabel
Left = 16
Top = 20
Width = 66
Height = 13
Caption = 'Compression: '
end
object cbAddCompression: TComboBox
Left = 16
Top = 36
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 0
Text = 'Maximum'
Items.Strings = (
'Maximum'
'Normal'
'Light'
'Minimum'
'None')
end
object ckAddSaveFullPath: TCheckBox
Left = 232
Top = 40
Width = 129
Height = 17
Caption = 'Save full path info'
TabOrder = 1
end
object ckAddAutoOverwrite: TCheckBox
Left = 232
Top = 16
Width = 185
Height = 17
Caption = 'Overwrite files without prompting'
TabOrder = 2
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'DeleteSpec'
DesignSize = (
538
317)
object laTitle7: TLabel
Left = 8
Top = 8
Width = 208
Height = 13
Caption = 'Enter File Names or Masks to Delete'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object bvTitle7: TBevel
Left = 8
Top = 27
Width = 523
Height = 9
Anchors = [akLeft, akTop, akRight]
Shape = bsTopLine
end
object laDeleteSpecList: TLabel
Left = 8
Top = 40
Width = 324
Height = 13
Caption =
'File names or masks to delete from your previously selected arch' +
'ives:'
end
object laCurDeleteSpec: TLabel
Left = 344
Top = 56
Width = 75
Height = 13
Caption = 'File name/mask'
end
object lbDeleteSpec: TListBox
Left = 8
Top = 56
Width = 329
Height = 249
Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 13
MultiSelect = True
TabOrder = 0
end
object buAddDeleteSpec: TButton
Left = 344
Top = 100
Width = 89
Height = 25
Anchors = [akTop, akRight]
Caption = '&Add'
TabOrder = 2
OnClick = buAddDeleteSpecClick
end
object buRemoveDeleteSpec: TButton
Left = 440
Top = 100
Width = 89
Height = 25
Anchors = [akTop, akRight]
Caption = '&Remove'
TabOrder = 3
OnClick = buRemoveDeleteSpecClick
end
object edDeleteSpec: TEdit
Left = 344
Top = 72
Width = 185
Height = 21
TabOrder = 1
end
end
end
object ztvBlakHole: TBlakHole
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
RecurseDirs = False
ArcType = atBh
AttributesEx = []
CompressMethod = cmDeflate
DefaultExt = '.bh'
StoreFilesOfType.Strings = (
'.ACE'
'.ARC'
'.ARJ'
'.BH'
'.CAB'
'.ENC'
'.GZ'
'.HA'
'.JAR'
'.LHA'
'.LZH'
'.PAK'
'.PK3'
'.PK_'
'.RAR'
'.TAR'
'.TGZ'
'.UUE'
'.UU'
'.WAR'
'.XXE'
'.Z'
'.ZIP'
'.ZOO')
Switch = swAdd
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnGetPassword = ztvUnZipGetPassword
OnRenameDupeFile = ztvZipRenameDupeFile
OnReplaceFile = ztvZipReplaceFile
Left = 8
Top = 296
end
object ztvGZip: TGZip
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
ArcType = atGZip
AttributesEx = []
DefaultExt = '.gz'
CompressMethod = cmDeflate
ConfirmOverwrites = True
Switch = swAdd
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnFileExists = ztvGZipFileExists
Left = 36
Top = 296
end
object ztvLha: TLha
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
RecurseDirs = False
ArcType = atLha
CompressMethod = cmFrozen6
DefaultExt = '.lha'
StoreFilesOfType.Strings = (
'.ACE'
'.ARC'
'.ARJ'
'.BH'
'.CAB'
'.ENC'
'.GZ'
'.HA'
'.JAR'
'.LHA'
'.LZH'
'.PAK'
'.PK3'
'.PK_'
'.RAR'
'.TAR'
'.TGZ'
'.UUE'
'.UU'
'.WAR'
'.XXE'
'.Z'
'.ZIP'
'.ZOO')
Switch = swAdd
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnRenameDupeFile = ztvZipRenameDupeFile
OnReplaceFile = ztvZipReplaceFile
Left = 64
Top = 296
end
object ztvJar: TJar
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
RecurseDirs = False
ArcType = atJar
AttributesEx = []
CompressMethod = cmDeflate
DefaultExt = '.jar'
SeedDataKeys.Key0 = 305419896
SeedDataKeys.Key1 = 591751049
SeedDataKeys.Key2 = 878082192
SeedHeaderKeys.Key0 = 269766672
SeedHeaderKeys.Key1 = 33834504
SeedHeaderKeys.Key2 = 541352064
StoreFilesOfType.Strings = (
'.ACE'
'.ARC'
'.ARJ'
'.BH'
'.CAB'
'.ENC'
'.GZ'
'.HA'
'.JAR'
'.LHA'
'.LZH'
'.PAK'
'.PK3'
'.PK_'
'.RAR'
'.TAR'
'.TGZ'
'.UUE'
'.UU'
'.WAR'
'.XXE'
'.Z'
'.ZIP'
'.ZOO')
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
OnDiskWriteProtectErr = ztvZipDiskWriteProtectErr
OnDiskInDrvErr = ztvZipDiskInDrvErr
OnGetPassword = ztvUnZipGetPassword
OnInsertDisk = ztvZipInsertDisk
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnRenameDupeFile = ztvZipRenameDupeFile
OnReplaceFile = ztvZipReplaceFile
Switch = swAdd
Left = 92
Top = 296
end
object ztvMakeCab: TMakeCab
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
RecurseDirs = False
ArcType = atCab
CompressMethod = cmMsZip
DefaultExt = '.cab'
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnReplaceFile = ztvZipReplaceFile
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
Left = 120
Top = 296
end
object ztvTar: TTar
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
RecurseDirs = False
ArcType = atTar
DefaultExt = '.tar'
CompressMethod = cmTarred
Switch = swAdd
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
UnixUName = 'root'
UnixGName = 'root'
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnRenameDupeFile = ztvZipRenameDupeFile
OnReplaceFile = ztvZipReplaceFile
Left = 148
Top = 296
end
object ztvZip: TZip
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
RecurseDirs = False
ArcType = atZip
AttributesEx = []
CompressMethod = cmDeflate
DefaultExt = '.zip'
SeedDataKeys.Key0 = 305419896
SeedDataKeys.Key1 = 591751049
SeedDataKeys.Key2 = 878082192
SeedHeaderKeys.Key0 = 269766672
SeedHeaderKeys.Key1 = 33834504
SeedHeaderKeys.Key2 = 541352064
StoreFilesOfType.Strings = (
'.ACE'
'.ARC'
'.ARJ'
'.BH'
'.CAB'
'.ENC'
'.GZ'
'.HA'
'.JAR'
'.LHA'
'.LZH'
'.PAK'
'.PK3'
'.PK_'
'.RAR'
'.TAR'
'.TGZ'
'.UUE'
'.UU'
'.WAR'
'.XXE'
'.Z'
'.ZIP'
'.ZOO')
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
OnDiskWriteProtectErr = ztvZipDiskWriteProtectErr
OnDiskInDrvErr = ztvZipDiskInDrvErr
OnGetPassword = ztvUnZipGetPassword
OnInsertDisk = ztvZipInsertDisk
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
OnRenameDupeFile = ztvZipRenameDupeFile
OnReplaceFile = ztvZipReplaceFile
Switch = swAdd
Left = 176
Top = 296
end
object ztvUUEncode: TUUEncode
OnError = ztvZipError
Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
DeleteOptions = doAllowUndo
CompressMethod = cmUUEncode
DefaultExt = '.uue'
KBytesPerVolume = 0
WriteTableToFile = False
OnFileExists = ztvGZipFileExists
OnNonWriteableArchive = ztvZipNonWriteableArchive
OnProgress = ztvUnZipProgress
Left = 204
Top = 296
end
object ztvUnACE: TUnACE
OnError = ztvUnZipError
CpuType = cptAuto
OnProgress = ztvUnZipProgress
OnGetPassword = ztvUnZipGetPassword
OnFileExists = ztvUnZipFileExists
Left = 8
Top = 328
end
object ztvUnArc: TUnArc
OnError = ztvUnZipError
CpuType = cptAuto
OnFileExists = ztvUnZipFileExists
OnProgress = ztvUnZipProgress
Left = 36
Top = 328
end
object ztvUnArj: TUnARJ
OnError = ztvUnZipError
CpuType = cptAuto
OnFileExists = ztvUnZipFileExists
OnGetPassword = ztvUnZipGetPassword
OnProgress = ztvUnZipProgress
Left = 64
Top = 328
end
object ztvUnBh: TUnBh
OnError = ztvUnZipError
CpuType = cptAuto
SeedDataKeys.Key0 = 305419896
SeedDataKeys.Key1 = 591751049
SeedDataKeys.Key2 = 878082192
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
OnGetPassword = ztvUnZipGetPassword
Left = 92
Top = 328
end
object ztvUnCab: TUnCab
OnError = ztvUnZipError
CpuType = cptAuto
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
Left = 120
Top = 328
end
object ztvUUDecode: TUUDecode
OnError = ztvUnZipError
CpuType = cptAuto
Algorithm = uudecode
VolumeStartNum = 0
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
Left = 148
Top = 328
end
object ztvUnGZip: TUnGZip
OnError = ztvUnZipError
CpuType = cptAuto
GzTarDeleteOptions = doFinal
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
OnNestedTarFile = ztvUnGZipNestedTarFile
Left = 176
Top = 328
end
object ztvUnJar: TUnJar
OnError = ztvUnZipError
CpuType = cptAuto
SeedDataKeys.Key0 = 305419896
SeedDataKeys.Key1 = 591751049
SeedDataKeys.Key2 = 878082192
SeedHeaderKeys.Key0 = 269766672
SeedHeaderKeys.Key1 = 33834504
SeedHeaderKeys.Key2 = 541352064
OnGetPassword = ztvUnZipGetPassword
OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
OnGetZipNextDisk = ztvZipTVGetZipNextDisk
OnGetZipLastDisk = ztvZipTVGetZipLastDisk
OnFileExists = ztvUnZipFileExists
OnProgress = ztvUnZipProgress
OnCorruptZipHeader = ztvZipTVCorruptZipHeader
Left = 204
Top = 328
end
object ztvUnLha: TUnLha
OnError = ztvUnZipError
CpuType = cptAuto
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
Left = 232
Top = 328
end
object ztvUnRar: TUnRar
OnError = ztvUnZipError
CpuType = cptAuto
OnFileExists = ztvUnZipFileExists
OnGetPassword = ztvUnZipGetPassword
OnProgress = ztvUnZipProgress
Left = 260
Top = 328
end
object ztvUnTar: TUnTar
OnError = ztvUnZipError
CpuType = cptAuto
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
Left = 288
Top = 328
end
object ztvUnZip: TUnZip
OnError = ztvUnZipError
CpuType = cptAuto
SeedDataKeys.Key0 = 305419896
SeedDataKeys.Key1 = 591751049
SeedDataKeys.Key2 = 878082192
SeedHeaderKeys.Key0 = 269766672
SeedHeaderKeys.Key1 = 33834504
SeedHeaderKeys.Key2 = 541352064
OnGetPassword = ztvUnZipGetPassword
OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
OnGetZipNextDisk = ztvZipTVGetZipNextDisk
OnGetZipLastDisk = ztvZipTVGetZipLastDisk
OnFileExists = ztvUnZipFileExists
OnProgress = ztvUnZipProgress
OnCorruptZipHeader = ztvZipTVCorruptZipHeader
Left = 316
Top = 328
end
object ztvUnZoo: TUnZoo
OnError = ztvUnZipError
CpuType = cptAuto
OnProgress = ztvUnZipProgress
OnFileExists = ztvUnZipFileExists
Left = 344
Top = 328
end
object ztvArc2Arc: TArc2Arc
OnError = ztvArc2ArcError
Attributes = [fsReadOnly, fsHidden, fsSysFile, fsArchive]
AttributesEx = []
ConfirmOverwrites = True
TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
OutArcType = tyBh
OnFileExists = ztvArc2ArcFileExists
OnProgress = ztvUnZipProgress
OnGetPassword = ztvUnZipGetPassword
Left = 8
Top = 264
end
object ztvMakeSFX: TMakeSFX
OnError = ztvMakeSFXError
SfxStubDir = 'C:\WINDOWS\System32\'
OnFileExists = ztvMakeSFXFileExists
Left = 36
Top = 264
end
object ztvZipCheck: TZipCheck
CpuType = cptAuto
OnCorruptZipHeader = ztvZipCheckCorruptZipHeader
OnFileExists = ztvUnZipFileExists
OnGetPassword = ztvUnZipGetPassword
OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
OnGetZipNextDisk = ztvZipTVGetZipNextDisk
OnGetZipLastDisk = ztvZipTVGetZipLastDisk
OnNestedTarFile = ztvZipCheckNestedTarFile
OnProgress = ztvUnZipProgress
OnStatus = ztvZipCheckStatus
Left = 64
Top = 264
end
object ztvZipTV: TZipTV
SeedHeaderKeys.Key0 = 269766672
SeedHeaderKeys.Key1 = 33834504
SeedHeaderKeys.Key2 = 541352064
RecurseDirs = False
OnCorruptZipHeader = ztvZipTVCorruptZipHeader
OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
OnGetZipNextDisk = ztvZipTVGetZipNextDisk
OnGetZipLastDisk = ztvZipTVGetZipLastDisk
Left = 92
Top = 264
end
object apodAddFiles: TApOpenDialog
DefaultExt = '*.*'
Filter = 'All Files (*.*)|*.*'
Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing, ofDontAddToRecent, ofForceShowHidden]
OptionsEx = [ofExNoPlacesBar]
Title = 'Select Files to Add'
CustDlgParams.PosParams.ShiftX = 0
CustDlgParams.PosParams.ShiftY = 0
CustDlgParams.PosParams.FitToScreen = False
DlgItemsCaptions.OK = '&Add'
VisibleControls = [dcFolderCombo, dcFolderLabel, dcSelectionCtrl, dcOkBtn, dcCancelBtn, dcFileName, dcFileNameLabel, dcFileType, dcFileTypeLabel, dcToolBar]
ListViewStyles.HotTrack = False
ListViewStyles.HotTrackStyles = []
ListViewStyles.FlatScrollBars = False
ListViewStyles.GridLines = False
ListViewStyles.RowSelect = False
ListViewStyles.EnableRename = True
ListViewStyles.EnableDelete = True
ListViewStyles.PopupOnEmpty = True
ListViewStyles.PopupOnSelection = True
PlacesBar.Visible = False
PlacesBar.Places = <>
PlacesBar.AllowEdit = True
PlacesBar.AllowDelete = True
PlacesBar.AllowDrop = True
PlacesBar.AutoScroll = True
PlacesBar.BorderStyle = bsNone
PlacesBar.Native = True
ExtFilter.ShowFolders = True
ExtFilter.Enabled = False
ToolBar.Flat = False
Left = 384
Top = 328
end
object sdgSave: TSaveDialog
DefaultExt = 'txt'
Filter = 'Text File (*.txt)|*.txt'
Title = 'Save Results To ...'
Left = 412
Top = 328
end
object pmSelect: TPopupMenu
Left = 440
Top = 328
object miSelectAll: TMenuItem
Caption = 'Select All'
OnClick = miSelectAllClick
end
object miDeselectAll: TMenuItem
Caption = 'Deselect All'
OnClick = miDeselectAllClick
end
object miInvertSelection: TMenuItem
Caption = 'Invert Selection'
OnClick = miInvertSelectionClick
end
end
end